home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1996 #14 / Monster Media No. 14 (April 1996) (Monster Media, Inc.).ISO / prog_bas / basicmsd.zip / GOTO.BAS < prev    next >
BASIC Source File  |  1996-02-11  |  742b  |  20 lines
  1. 0 rem *
  2. 1 rem *
  3. 2 rem *GOTO_TEST_FOR_NITROUSBASIC
  4. 3 rem *
  5. 4 rem *
  6. 5 cls 
  7. 10 print "Line 10 going to line 4000":goto 4000 
  8. 20 print "Line 20 going to line 4010":goto 4010 
  9. 35 print "Line 35 going to line 2000":goto 2000 
  10. 50 print "Line 50 going to line 100":goto 100 
  11. 100 print "Line 100 going to line 5000":goto 5000 
  12. 1500 print "Line 1500 going to line 60000":goto 60000 
  13. 2000 print "Line 2000 going to line 3000":goto 3000 
  14. 2500 print "Line 2500 going to line 1500":goto 1500 
  15. 3000 print "Line 3000 going to line 2500":goto 2500 
  16. 4000 print "Line 4000 going to line 20":goto 20 
  17. 4010 print "Line 4010 going to line 50":goto 50 
  18. 5000 print "Line 5000 going to line 35":goto 35 
  19. 60000 print "Line 60000... Now ending":end 
  20.